;;;QQ:67762207
[@TelePortMove2]
{
#DEFINE A0{DESTINATION} A0 
#DEFINE D0{FARE} D0 
#DEFINE A1{POSITION} A1 

#ACT
Mov A0{DESTINATION} %ARG(1) 
Mov D0{FARE} %ARG(2) 
Mov A1{POSITION} %ARG(3) 

#IF
CheckGold %D0{FARE} 
#ACT
movr D7 7
mov A4 "ʯ"
addstr A4 %D7
LoadValue A7 "Ϣ.INI" [Ϣ] [%A4]
Delaygoto [local] 2 @MoveRootin2
#SAY
ӭʹôͷ˽һ·Ϣ\\
<$OUTPUT(A7)>\
#ELSESAY
(Ǯ)\\


[@MoveRootin2]
;-------------------------------------------------------------------------------
#IF
Equal A0{DESTINATION} "ICE1" 
Equal A1{POSITION} "center" 
#ACT
Take  %D0{FARE} 
mapmove D005 140 53
break

#IF
Equal A0{DESTINATION} "ICE2" 
Equal A1{POSITION} "center" 
#ACT
Take  %D0{FARE} 
mapmove 82 215 113 
break

#IF
Equal A0{DESTINATION} "Bichon" 
Equal A1{POSITION} "South" 
#ACT
Take  %D0{FARE} 
mapmove 0 498 464 
break

#IF
Equal A0{DESTINATION} "Bichon" 
Equal A1{POSITION} "North" 
#ACT
Take  %D0{FARE}
mapmove 0 370 335
break

#IF
Equal A0{DESTINATION} "Bichon"
Equal A1{POSITION} "West"
#ACT
Take  %D0{FARE}
mapmove 0 379 445
break
break

#IF
Equal A0{DESTINATION} "Bichon" 
Equal A1{POSITION} "East" 
#ACT
Take  %D0{FARE} 
mapmove 0 507 312 
break

#IF
Equal A0{DESTINATION} "Bichon" 
Equal A1{POSITION} "Center" 
#ACT
Take  %D0{FARE} 
mapmove 0 420 368 
break

#IF
Equal A0{DESTINATION} "KugKyung"
Equal A1{POSITION} "North" 
#ACT
Take  %D0{FARE} 
mapmove 01 456 217 
break

#IF
Equal A0{DESTINATION} "KugKyung" 
Equal A1{POSITION} "West" 
#ACT
Take  %D0{FARE} 
mapmove 01 411 288 
break

#IF
Equal A0{DESTINATION} "KugKyung" 
Equal A1{POSITION} "South"
#ACT
Take  %D0{FARE} 
mapmove 01 463 357 
break

#IF
Equal A0{DESTINATION} "EunHang"
Equal A1{POSITION} "Center" 
#ACT
Take  %D0{FARE} 
mapmove 02 249 145 
break

#IF
Equal A0{DESTINATION} "EunHang"
Equal A1{POSITION} "Center2" 
#ACT
Take  %D0{FARE} 
mapmove 02 250 193
break

#IF
Equal A0{DESTINATION} "DoGwan"
Equal A1{POSITION} "Center" 
#ACT
Take  %D0{FARE} 
mapmove 1 416 180 
break

#IF
Equal A0{DESTINATION} "DoGwan"
Equal A1{POSITION} "Center2" 
#ACT
Take  %D0{FARE} 
mapmove 1 401 127 
break

#IF
Equal A0{DESTINATION} "SnakeVally" 
Equal A1{POSITION} "North" 
#ACT
Take  %D0{FARE} 
mapmove 2 313 193 
break

#IF
Equal A0{DESTINATION} "SnakeVally" 
Equal A1{POSITION} "South" 
#ACT
Take  %D0{FARE} 
mapmove 2 306 245 
break

#IF
Equal A0{DESTINATION} "SaBuk"
Equal A1{POSITION} "Center" 
#ACT
goto @CasTleWarMove_Sabuk 
break

#IF
Equal A0{DESTINATION} "Oasis" 
Equal A1{POSITION} "Center" 
#ACT
Take  %D0{FARE}
mapmove 4 435 84
break

#IF
Equal A0{DESTINATION} "Numa" 
Equal A1{POSITION} "Center" 
#ACT
Take  %D0{FARE} 
mapmove 41 184 137 
break

#IF
Equal A0{DESTINATION} "Samak" 
Equal A1{POSITION} "East" 
#ACT
Take  %D0{FARE} 
mapmove 5 228 128
break

#IF
Equal A0{DESTINATION} "Samak" 
Equal A1{POSITION} "West" 
#ACT
Take  %D0{FARE} 
mapmove 5 228 128
break

#IF
Equal A0{DESTINATION} "Ant" 
Equal A1{POSITION} "Center" 
#ACT
Take  %D0{FARE} 
mapmove 6 273 732 
break

#IF
Equal A0{DESTINATION} "MongChon" 
Equal A1{POSITION} "East" 
#ACT
Take  %D0{FARE} 
mapmove 74 349 330 
break

#IF
Equal A0{DESTINATION} "MongChon" 
Equal A1{POSITION} "West" 
#ACT
Take  %D0{FARE} 
mapmove 74 271 268 
break

#IF
Equal A0{DESTINATION} "SukGak" 
Equal A1{POSITION} "Center" 
#ACT
Take  %D0{FARE} 
mapmove 75 184 91 
break

#IF
Equal A0{DESTINATION} "HalfMoon" 
Equal A1{POSITION} "Center" 
#ACT
Take  %D0{FARE} 
mapmove 8 288 242 
break

#IF
Equal A0{DESTINATION} "HalfCave" 
Equal A1{POSITION} "Center" 
#ACT
Take  %D0{FARE} 
mapmove 8 448 580 
break

#IF
Equal A0{DESTINATION} "HalfTemple" 
Equal A1{POSITION} "Center" 
#ACT
Take  %D0{FARE} 
mapmove 8 668 389 
break

#IF
Equal A0{DESTINATION} "RedZone" 
Equal A1{POSITION} "Center" 
#ACT
Take  %D0{FARE} 
mapmove 81 127 266 
break

#IF
Equal A0{DESTINATION} "Encore" 
Equal A1{POSITION} "Center" 
#ACT
Take  %D0{FARE} 
mapmove 9 190 580 
break


#IF
Equal A0{DESTINATION} "by" 
Equal A1{POSITION} "Center" 
#ACT
Take  %D0{FARE} 
mapmove 82 275 170 
break

[@CasTleWarMove_Sabuk]
#IF
#ACT
loadvalue D2 "ParamControl\״̬.ini" [ɳͿ] [״̬]


#IF
!EQUAL D2 0
or IsOnCastleWar [Sabuk] 
#SAY
㲻ǲμɳͿ˹սлԱ\\
</@exit>

#ACT
break

#IF
!EQUAL D2 0
or IsOnReadyCastleWar [Sabuk] 
#SAY
㲻ǲμɳͿ˹սлԱ\\
</@exit>

#ACT
break

#IF
#ACT
Take  %D0{FARE}
mapmove 3 222 160
}
;;;QQ:67762207